﻿Module Module1

    Sub Main()
        Dim TVien As New ThuVien
        Console.WriteLine("Nhap Danh Sach Doc Gia")
        TVien.Nhap()
        Console.WriteLine()
        Console.WriteLine("**************************************************")
        Console.WriteLine("Danh Sach Doc Gia vua nhap la: ")
        TVien.Xuat()
        Console.WriteLine()
        Console.WriteLine("**************************************************")
        Console.WriteLine("Tong tien lam the ma thu vien thu duoc la: {0}", TVien.TinhTongTien)
        Console.ReadLine()
    End Sub

End Module
